home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / wildcat / tscn312.zip / SCANFILE.ZIP / SCANFILE.BAK < prev    next >
Text File  |  1992-08-10  |  2KB  |  82 lines
  1.  
  2. ECHO ON
  3. REM you must be running the latest version of POSTMSTR to utilize
  4. REM the DOOR feature.  See POSTMSTR.DOC for more information.
  5.  
  6. IF ERRORLEVEL 21 IF NOT ERRORLEVEL 22 GOTO fatal
  7. IF ERRORLEVEL 20 IF NOT ERRORLEVEL 21 GOTO memory
  8. IF ERRORLEVEL 17 IF NOT ERRORLEVEL 18 GOTO timer
  9. IF ERRORLEVEL 16 IF NOT ERRORLEVEL 17 GOTO highsec
  10. IF ERRORLEVEL 15 IF NOT ERRORLEVEL 16 GOTO abort
  11. IF ERRORLEVEL  6 IF NOT ERRORLEVEL  7 GOTO extprogerr
  12. IF ERRORLEVEL  5 IF NOT ERRORLEVEL  6 GOTO noextprog
  13. IF ERRORLEVEL  4 IF NOT ERRORLEVEL  5 GOTO exists
  14. IF ERRORLEVEL  3 IF NOT ERRORLEVEL  4 GOTO agereject
  15. IF ERRORLEVEL  2 IF NOT ERRORLEVEL  3 GOTO integrity
  16. IF ERRORLEVEL  1 IF NOT ERRORLEVEL  2 GOTO virus
  17. IF ERRORLEVEL 0 GOTO thanks
  18.  
  19. :fatal
  20.       rem do nothing
  21. GOTO end
  22.  
  23. :memory
  24.       rem do nothing
  25. GOTO end
  26.  
  27. :timer
  28.       rem do nothing
  29. GOTO end
  30.  
  31. :highsec
  32.       GOTO thanks
  33. GOTO end
  34.  
  35. :abort
  36.       rem do nothing
  37. GOTO end
  38. :extprogerr
  39.   POSTMSTR /i:c:\wc30\msg\extprog.imp /t:door /f:Sysop /s:Recent Upload! /p
  40. REM           ^^^^^^^^^^^^^^^^^^^^^^^
  41. GOTO end   REM           /
  42. REM             Edit these to where you put
  43. REM             the enclosed *.imp files!
  44.  
  45. :noextprog
  46.   POSTMSTR /i:c:\wc30\msg\noextpr.imp /t:door /f:Sysop /s:Recent Upload! /p
  47. GOTO end
  48.  
  49. :exists
  50.   POSTMSTR /i:c:\wc30\msg\exists.imp /t:door /f:Sysop /s:Recent Upload! /p
  51. GOTO end
  52.  
  53. :agereject
  54.   POSTMSTR /i:c:\wc30\msg\agereje.imp /t:door /f:Sysop /s:Recent Upload! /p
  55. GOTO end
  56.  
  57. :integrity
  58.   POSTMSTR /i:c:\wc30\msg\integri.imp /t:door /f:Sysop /s:Recent Upload! /p
  59. GOTO end
  60.  
  61. :thanks
  62.   IF "%THANKED%"=="YES" GOTO end
  63.   POSTMSTR /i:c:\wc30\msg\thanks.imp /t:door /f:Sysop /s:Recent Upload! /p
  64.   SET THANKED=YES
  65. GOTO end
  66.  
  67. :end
  68.  
  69. IF NOT EXIST c:\wc30\transcan.err GOTO done
  70.   POSTMSTR /i:c:\wc30\transcan.err /t:sysop /f:TranScan /s:Recent Upload! /p
  71. REM           ^^^^^^^^^^^^^^^^^^^^
  72. REM                     /
  73. REM edit this so it points to the path your transcan.exe is in.
  74. REM         \      here too
  75. REM vvvvvvvvvvvvvvvvvvvv
  76. DEL c:\wc30\transcan.err
  77.  
  78. :done
  79.  
  80.  
  81.  
  82.